home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Ss-Sz / Stack Builder 4.1 Shell.cpt / Stack Builder v4.1 Shell / background_5541.txt < prev    next >
Text File  |  1987-11-12  |  3KB  |  154 lines
  1. -- background: 5541 from stack: in.1 Shell
  2. -- bmap block id: 12455
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Master Graphics Card
  6. ----- HyperTalk script -----
  7. on openCard
  8.   do "textSetUp"
  9. end openCard
  10. -------------------------------------------------------------------
  11. on doMenu it
  12.   if it is "Delete Card" or it is "Cut Card" then
  13.     if background field "CheckID" is "Master" then
  14.       Beep 20
  15.       answer "I can't let you remove a 'Master Original' card!" with "Oops, sorry!"
  16.       exit doMenu
  17.     end if
  18.     play "boing" gh
  19.     answer "Don't forget‚Ķ delete 'Index' reference too!" with "Yes, I will!"
  20.     set cursor to 4
  21.   end if
  22.   pass doMenu
  23. end doMenu
  24. -------------------------------------------------------------------
  25.  
  26.  
  27.  
  28. -- part 1 (field)
  29. -- low flags: 01
  30. -- high flags: 0000
  31. -- rect: left=95 top=32 right=59 bottom=429
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 2
  36. -- text size: 18
  37. -- style flags: 0
  38. -- line height: 24
  39. -- part name: Graphic Card Name
  40.  
  41.  
  42. -- part 2 (field)
  43. -- low flags: 01
  44. -- high flags: 0000
  45. -- rect: left=52 top=298 right=312 bottom=91
  46. -- title width / last selected line: 0
  47. -- icon id / first selected line: 0 / 0
  48. -- text alignment: 1
  49. -- font id: 3
  50. -- text size: 9
  51. -- style flags: 0
  52. -- line height: 12
  53. -- part name: CheckID
  54.  
  55.  
  56. -- part 3 (button)
  57. -- low flags: 00
  58. -- high flags: 2000
  59. -- rect: left=446 top=30 right=55 bottom=483
  60. -- title width / last selected line: 0
  61. -- icon id / first selected line: 21700 / 21700
  62. -- text alignment: 1
  63. -- font id: 0
  64. -- text size: 12
  65. -- style flags: 0
  66. -- line height: 16
  67. -- part name: New Button
  68. ----- HyperTalk script -----
  69. on mouseUp
  70.   go home
  71. end mouseUp
  72.  
  73.  
  74.  
  75. -- part 4 (button)
  76. -- low flags: 00
  77. -- high flags: 2000
  78. -- rect: left=227 top=294 right=317 bottom=265
  79. -- title width / last selected line: 0
  80. -- icon id / first selected line: 1014 / 1014
  81. -- text alignment: 1
  82. -- font id: 0
  83. -- text size: 12
  84. -- style flags: 0
  85. -- line height: 16
  86. -- part name: Previous
  87. ----- HyperTalk script -----
  88. on mouseUp
  89.   visual effect wipe right
  90.   go prev
  91. end mouseUp
  92.  
  93.  
  94.  
  95. -- part 5 (button)
  96. -- low flags: 00
  97. -- high flags: 2000
  98. -- rect: left=262 top=293 right=318 bottom=305
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 1013 / 1013
  101. -- text alignment: 1
  102. -- font id: 0
  103. -- text size: 12
  104. -- style flags: 0
  105. -- line height: 16
  106. -- part name: New Button
  107. ----- HyperTalk script -----
  108. on mouseUp
  109.   visual effect wipe left
  110.   go next
  111. end mouseUp
  112.  
  113.  
  114.  
  115. -- part 7 (button)
  116. -- low flags: 00
  117. -- high flags: 2000
  118. -- rect: left=38 top=28 right=60 bottom=444
  119. -- title width / last selected line: 0
  120. -- icon id / first selected line: 0 / 0
  121. -- text alignment: 1
  122. -- font id: 0
  123. -- text size: 12
  124. -- style flags: 0
  125. -- line height: 16
  126. -- part name: Return
  127. ----- HyperTalk script -----
  128. on mouseUp
  129.   visual effect zoom open to black
  130.   pop card
  131. end mouseUp
  132.  
  133.  
  134.  
  135. -- part 8 (button)
  136. -- low flags: 00
  137. -- high flags: 2000
  138. -- rect: left=487 top=34 right=90 bottom=505
  139. -- title width / last selected line: 0
  140. -- icon id / first selected line: 0 / 0
  141. -- text alignment: 1
  142. -- font id: 0
  143. -- text size: 12
  144. -- style flags: 0
  145. -- line height: 16
  146. -- part name: Index Link
  147. ----- HyperTalk script -----
  148. on mouseUp
  149.   visual effect dissolve to black
  150.   go to card id 6849
  151. end mouseUp
  152.  
  153.  
  154.